home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / boymks5e.zip / GT.BSC < prev    next >
Text File  |  1991-12-16  |  4KB  |  109 lines
  1. \\
  2. \\ Gt Script by Lee Breeden
  3. \\
  4.  
  5. \TO[40]                       \\ sets WaitFor timeout to 40 seconds
  6. |logon
  7. \ST[ » Press <TAB> for Menu options «]
  8. \pa[1]
  9. \gb[name]
  10. |name
  11. \CA-[\QA[%SN]\HU\PA[3]\QD\eb]
  12. \wp[1]
  13. \IF+l display ANSI graphics? [y{\gb[name]]
  14. \IF+first[\!{\gb[name]]
  15. \IF+LAST [\@{\gb[name]]
  16. \IF+Lee [y{\gb[name]]
  17. \IF+Enter Password:[%PW{\gb[name]]
  18. \IF+bypass the logon bulletins?[y{\gb[name]]
  19. \IF+Check conferences for mail[N{\gb[name]]
  20. \IF+press any key to continue[{\gb[name]]
  21. \IF+Strike a key when ready[{\gb[name]]
  22. \IF+ress RETURN to continue:[{\gb[name]]
  23. \IF+desired bulletin number: [q{\gb[name]]
  24. \IF+to continue [{\gb[name]]
  25. \IF+for personal mail[N{\gb[name]]
  26. \\IF+Enter command[o 9{\pa[7] \gb[mail]]
  27. \IF+FILES:  AREA[ \dm[ %SN Logon Completed! Your on your own <g>..]\eb]
  28. \\IF+FILES:  AREA[o 9{\pa[7] \gb[mail]]
  29. {~~\gb[name]
  30.  
  31. |mail
  32. \\ the commands below ASSUME that you have FASTMAIL set to extract mail
  33. \\ automatically, and that the maximun mail packet size is set so that you
  34. \\ never reach its limit...ie 500K.
  35. \nd[d:\gtread]
  36. \to[254]
  37. \\WF[do you wish to download it? "[y/n"] ]y{
  38. \\IW-[gb[upmail]
  39. \WF[B00]\DLZ-[d:\gtread\fastmail.zip]
  40. \gb[upmail]
  41. |upmail
  42. \to[40]
  43. \wf[Enter your selection]\pa[1]
  44. \fe+d:\gtread\fastrply.zip[5~\wf[b01]\ulz-[d:\gtread\fastrply.zip]]
  45. \fe+d:\gtread\fastrply.zip[\IT+[\dc-[del d:\gtread\fastrply.zip]]]
  46. \nd[%b:]
  47. \IF+ress RETURN to continue:[\pa[1]{]
  48. \IF+Enter your selection[\pa[1] 0~{]
  49. \IF-Enter your selection[\pa[1] 0~{]
  50. \pa[10]g{\pa[2]y{\pa[4]\hu\ma[7]
  51. \eb
  52.  
  53. |*TAB                          \\ This runs automatically when <Tab> pressed
  54. \KS  \SV0[1]
  55. \DM38,%V0[ ╔═══════════════════════════════════════╗ ]  \+V0[1]
  56. \DM38,%V0[ ║ OnLine MENU "@   %HR:%MI  %Mo/%DA/%YR       ║ ]  \+V0[1]
  57. \DM38,%V0[ ╠═══════════════════════════════════════╣ ]  \+V0[1]
  58. \\DM38,%V0[ ║ <C> =                                 ║ ]  \+V0[1]
  59. \DM38,%V0[ ║ <D> = Download a file                 ║ ]  \+V0[1]
  60. \DM38,%V0[ ║ <DM>= Download Mail (from mail door)  ║ ]  \+V0[1]
  61. \DM38,%V0[ ║ <E> = Edit Script                     ║ ]  \+V0[1]
  62. \DM38,%V0[ ║ <F> = File Manager                    ║ ]  \+V0[1]
  63. \DM38,%V0[ ║ <H> = Hang up command                 ║ ]  \+V0[1]
  64. \\DM38,%V0[ ║ <G> =                                 ║ ]  \+V0[1]
  65. \DM38,%V0[ ║ <J> = Jump to DOS                     ║ ]  \+V0[1]
  66. \DM38,%V0[ ║ <L> = Log to disk ...status %LD       ║ ]  \+V0[1]
  67. \DM38,%V0[ ║ <M> = Manual macro                    ║ ]  \+V0[1]
  68. \DM38,%V0[ ║ <N> = New File Scan                   ║ ]  \+V0[1]
  69. \DM38,%V0[ ║ <O> = Open Door                       ║ ]  \+V0[1]
  70. \DM38,%V0[ ║ <P> = edit Phone directory            ║ ]  \+V0[1]
  71. \DM38,%V0[ ║ <Q> = Run Quest block                 ║ ]  \+V0[1]
  72. \DM38,%V0[ ║ <R> = Read mail                       ║ ]  \+V0[1]
  73. \DM38,%V0[ ║ <S> = Scroll-back buffer              ║ ]  \+V0[1]
  74. \DM38,%V0[ ║ <T> = Termanial Mode                  ║ ]  \+V0[1]
  75. \DM38,%V0[ ║ <U> = Upload a file                   ║ ]  \+V0[1]
  76. \DM38,%V0[ ║ <UM>= Upload Mail (from mail door)    ║ ]  \+V0[1]
  77. \DM38,%V0[ ╟───────────────────────────────────────╢ ]  \+V0[1]
  78. \DM38,%V0[ ║<Esc>= ABORT script                    ║ ]  \+V0[1]
  79. \DM38,%V0[ ╚═══════════════════════════════════════╝ ]
  80. \KO[30]  \BB+  \KV0_[Enter OPTION: ]  \BB-  \RS
  81. \IV0+C[{\GB[*Tab]]
  82. \IV0+DM[\BL[MMdl]]
  83. \IV0+D[\BL[Download]]
  84. \IV0+E[\DC-[%WC %S:%SC]\gb[*tab]]
  85. \IV0+G[\IE-%AM,G[\AM[G]|\AM[%AP]] ]
  86. \IV0+F[\FM[]\gb[*tab]]
  87. \IV0+H[\gb[logoff]]
  88. \IV0+J[\JD\gb[*tab]]
  89. \IV0+L[\LD*\gb[*tab]]
  90. \IV0+M[\KV9[MACRO:] @V9  \LV9[] \IE+%LV,1[\SV9[%V9]]\gb[*tab]]
  91. \IV0+N[N S A N{\GB[termlines]]
  92. \IV0+O[op {\GB[termlines]]
  93. \IV0+P[ \DI[] \GB[*Tab] ]
  94. \IV0+Q[ \bl[quest]\gb[termlines]]
  95. \IV0+R[R Y{\GB[termlines]]
  96. \IV0+S[\RB\gb[*Tab]]
  97. \IV0+T[\gb[termlines]\gb[*tab]]
  98. \IV0+UM[\bl[MMul]\gb[*tab]]
  99. \IV0+U[\bl[upload]\gb[*tab]]
  100. \GB[*TAB]
  101.  
  102. |TermLines
  103. \to[120]
  104. \ST[ » Press <TAB> for Menu options «]
  105. \RE[\CA-[\ab] \IK+[%IK]]
  106.  
  107. DOORWAY redirecton is now turned on
  108.  
  109.